home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Aminet 44
/
Aminet 44 (2001)(GTI - Schatztruhe)[!][Aug 2001].iso
/
Aminet
/
misc
/
emu
/
Alcuin1_2.lha
/
Alcuin1_2
/
src
/
checkrom.c
next >
Wrap
C/C++ Source or Header
|
1995-01-12
|
3KB
|
145 lines
/*
* This file is part of x48, an emulator of the HP-48sx Calculator.
* Copyright (C) 1994 Eddie C. Dost (ecd@dressler.de)
*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/
/* $Log: checkrom.c,v $
* Revision 1.4 1995/01/11 18:20:01 ecd
* major update to support HP48 G/GX
*
* Revision 1.3 1994/11/02 14:40:38 ecd
* support for "compressed" rom files added
*
* Revision 1.3 1994/11/02 14:40:38 ecd
* support for "compressed" rom files added
*
* Revision 1.2 1994/10/06 16:30:05 ecd
* changed char to unsigned
*
* Revision 1.1 1994/10/01 10:12:53 ecd
* Initial revision
*
*
* $Id: checkrom.c,v 1.4 1995/01/11 18:20:01 ecd Exp ecd $
*/
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <sys/stat.h>
#include "global.h"
#include "romio.h"
unsigned char *rom;
unsigned short rom_crc, crc;
int verbose = 0;
char *progname;
#define calc_crc(n) (crc = ((crc >> 4) ^ (((crc ^ n) & 0xf) * 0x1081)))
int
#ifdef __FunctionProto__
main(int argc, char **argv)
#else
main(argc, argv)
int argc;
char **argv;
#endif
{
unsigned char version[7];
long ver_addr;
int i, a, c, d, d0, d1, D0, D1;
int fail;
if (argc < 2) {
fprintf(stderr, "usage: %s rom-file\n", argv[0]);
exit (1);
}
if (!read_rom_file(argv[1], &rom, &rom_size))
{
fprintf(stderr, "%s: can\'t read ROM from %s\n", argv[0], argv[1]);
exit (1);
}
if (opt_gx != 0)
ver_addr = 0x7ffbf;
else
ver_addr = 0x7fff0;
for (i = 0; i < 6; i++) {
version[i] = rom[ver_addr + 2 * i + 1] << 4;
version[i] |= rom[ver_addr + 2 * i];
}
version[6] = '\0';
printf("ROM Version is %s\n", version);
for (i = 0x100; i < 0x140; i++) {
rom[i] = 0x0;
}
fail = a = 0;
D0 = 0x00000;
D1 = 0x40000;
for (d = 1; d <= rom_size / 0x80000; d++) {
crc = 0x0000;
rom_crc = 0;
for (i = 0; i < 4; i++) {
rom_crc <<= 4;
rom_crc |= (rom[0x80000 * d - i - 1] & 0x0f);
}
if (opt_gx)
printf("ROM CRC %d reads 0x%.4x\n", d, rom_crc);
else
printf("ROM CRC reads 0x%.4x\n", rom_crc);
d0 = D0;
d1 = D1;
for (c = 0x3fff; c >= 0x0000; c--) {
for (i = 0; i < 16; i++) {
calc_crc(rom[d0 + i]);
}
d0 += 16;
for (i = 0; i < 16; i++) {
calc_crc(rom[d1 + i]);
}
d1 += 16;
}
D0 += 0x80000;
D1 += 0x80000;
a = crc;
a = ((a | 0xf0000) + 1) & 0xfffff;
if (a != 0x00000) {
fail++;
}
}
if (fail != 0)
printf("IROM %.4x: ROM CRC test FAILED !!!\n", a & 0xffff);
else
printf("IROM OK: ROM CRC test passed.\n");
return 0;
}